﻿Public Class SourceSpan

    Private ReadOnly m_startLocation As Location
    Public ReadOnly Property StartLocation() As Location
        Get
            Return m_startLocation
        End Get
    End Property

    Private ReadOnly m_endLocation As Location
    Public ReadOnly Property EndLocation() As Location
        Get
            Return m_endLocation
        End Get
    End Property

    Public Sub New(ByVal startLocation As Location, ByVal endLocation As Location)
        m_startLocation = startLocation
        m_endLocation = endLocation
    End Sub
End Class
